powComplex, imaginary part

Time bar (total: 11.7s)

start0.0ms (0%)

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

analyze417.0ms (3.6%)

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

Compiled 39 to 18 computations (53.8% saved)

sample3.8s (32.4%)

Memory
-13.4MiB live, 3 733.0MiB allocated; 2.0s collecting garbage
Samples
1.8s5 303×0valid
1.3s2 893×1valid
73.0ms60×2valid
Precisions
Click to see histograms. Total time spent on operations: 2.7s
ival-exp: 980.0ms (36.3% of total)
ival-mult: 396.0ms (14.7% of total)
ival-hypot: 347.0ms (12.8% of total)
ival-log: 268.0ms (9.9% of total)
ival-sin: 244.0ms (9% of total)
adjust: 181.0ms (6.7% of total)
ival-atan2: 133.0ms (4.9% of total)
ival-add: 77.0ms (2.8% of total)
ival-sub: 74.0ms (2.7% of total)
ival-assert: 3.0ms (0.1% of total)
Bogosity

explain498.0ms (4.3%)

Memory
-19.4MiB live, 781.7MiB allocated; 107ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1880-0-(sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
1340-2(3.422548419268856e-160 4.034104236750149e-169 2.8409254382974163e+114 7.50268938986641e-170)(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
80-2(4.2502722093864354e+217 3.9051351594196746e-106 -4.496475743841145e-198 -8.659757895653002e+119)(*.f64 (atan2.f64 x.im x.re) y.im)
60-1(4.1219821768830866e+169 1.0274304860518158e-149 -4.836126939189023e+285 4.373121840742961e+79)(*.f64 (atan2.f64 x.im x.re) y.re)
00-0-(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)
00-0-(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
00-0-(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
00-0-(atan2.f64 x.im x.re)
00-0-(*.f64 x.re x.re)
00-0-(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
00-0-x.re
00-0-x.im
00-0-(+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
00-0-(*.f64 x.im x.im)
00-0-(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
00-0-(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
00-0-y.re
00-0-y.im
00-0-(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
sin.f64(sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))sensitivity1860
sqrt.f64(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))oflow-rescue1180
(*.f64 x.re x.re)overflow67
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))overflow118
(*.f64 x.im x.im)overflow69
sin.f64(sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))oflow-rescue20
(+.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))overflow2
(*.f64 (atan2.f64 x.im x.re) y.re)overflow1
(*.f64 x.re x.re)overflow67
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))overflow118
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)overflow1
(*.f64 x.im x.im)overflow69
*.f64(*.f64 (atan2.f64 x.im x.re) y.re)n*u10
sqrt.f64(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))uflow-rescue10
(*.f64 x.re x.re)underflow55
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))underflow14
(*.f64 x.im x.im)underflow64
Confusion
Predicted +Predicted -
+1542
-6634
Precision
0.7
Recall
0.9871794871794872
Confusion?
Predicted +Predicted MaybePredicted -
+15402
-66034
Precision?
0.7
Recall?
0.9871794871794872
Freqs
test
numberfreq
036
1132
288
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
202.0ms370×1valid
22.0ms136×0valid
5.0ms2valid
Compiler

Compiled 393 to 61 computations (84.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 182.0ms
ival-mult: 49.0ms (26.9% of total)
adjust: 35.0ms (19.2% of total)
ival-sin: 25.0ms (13.7% of total)
ival-hypot: 20.0ms (11% of total)
ival-log: 18.0ms (9.9% of total)
ival-atan2: 16.0ms (8.8% of total)
ival-add: 8.0ms (4.4% of total)
ival-exp: 5.0ms (2.7% of total)
ival-sub: 4.0ms (2.2% of total)
ival-true: 1.0ms (0.5% of total)
ival-assert: 0.0ms (0% of total)

preprocess198.0ms (1.7%)

Memory
41.2MiB live, 281.1MiB allocated; 67ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0141575
1390556
21085552
32819550
01937
03437
16236
215736
334236
482236
5453936
0818336
Stop Event
iter limit
node limit
iter limit
node limit
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Outputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (/.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.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
39.3%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Compiler

Compiled 37 to 19 computations (48.6% saved)

series271.0ms (2.3%)

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

12 calls:

TimeVariablePointExpression
91.0ms
y.re
@0
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
30.0ms
y.re
@-inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
20.0ms
y.im
@-inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
19.0ms
x.re
@inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
17.0ms
y.im
@0
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))

rewrite236.0ms (2%)

Memory
-0.9MiB live, 232.8MiB allocated; 78ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0158020000
0161119794
0824019794
Stop Event
iter limit
node limit
iter limit
Counts
291 → 314
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
Outputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (exp.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 (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 (*.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im))) (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im 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 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)) (+.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im)) (*.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))))
(-.f64 (*.f64 (log.f64 (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 (neg.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))))
(pow.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(/.f64 (-.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
(-.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 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 (sin.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im 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 (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 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im 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 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im 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 (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 (neg.f64 (atan2.f64 x.im x.re)) y.re))
(+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.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) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.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) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.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 6 binary64)))) (-.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64)))) (-.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (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 (+.f64 (*.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 (+.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (-.f64 (*.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 (+.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.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) (+.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (-.f64 (*.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) (+.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.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) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal -3 binary64))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.im x.im))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx x.re x.re)
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.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) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.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) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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) (sin.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.im)) (+.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) 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)) (+.f64 (*.f64 y.im (log.f64 x.im)) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.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) (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (-.f64 (*.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) (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.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 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (-.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal -1/720 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (-.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.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)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal -1/720 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.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 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (-.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal -1/720 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (-.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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 (-.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.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) (-.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.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)))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 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)))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 #s(literal -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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal -1/720 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #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) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.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 6 binary64)))) (-.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64)))) (-.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (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 (+.f64 (*.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 (+.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (-.f64 (*.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 (+.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.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) (+.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (-.f64 (*.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) (+.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.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) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal -3 binary64))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx x.im x.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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) (sin.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.re)) (+.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) 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)) (+.f64 (*.f64 y.im (log.f64 x.re)) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.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) (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (-.f64 (*.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) (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (-.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal -1/720 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (-.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal -1/720 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (-.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal -1/720 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (-.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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 (-.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.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) (-.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.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)))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 #s(literal -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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal -1/720 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #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) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (-.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 y.re (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64))))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 y.re (+.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.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 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx y.re y.re)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.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))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.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))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.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 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (-.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.re) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.re)) (*.f64 #s(literal 1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx y.im y.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.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 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.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 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64))))))) (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))

eval55.0ms (0.5%)

Memory
1.3MiB live, 99.0MiB allocated; 16ms collecting garbage
Compiler

Compiled 31 753 to 2 753 computations (91.3% saved)

prune31.0ms (0.3%)

Memory
23.5MiB live, 70.8MiB allocated; 2ms collecting garbage
Pruning

21 alts after pruning (21 fresh and 0 done)

PrunedKeptTotal
New39121412
Fresh000
Picked101
Done000
Total39221413
Accuracy
90.5%
Counts
413 → 21
Alt Table
Click to see full alt table
StatusAccuracyProgram
14.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))) (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im 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 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im 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 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))))
12.3%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
27.1%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
25.0%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
24.3%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
24.0%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
53.5%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
35.3%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.re) (atan2.f64 x.im x.re))))))
37.6%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
14.1%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))
11.8%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.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 (+.f64 (*.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) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))
45.2%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
28.2%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 #s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
29.8%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
24.2%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
21.8%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
44.9%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))
36.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
35.8%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
12.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
22.2%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
Compiler

Compiled 2 866 to 1 398 computations (51.2% saved)

series530.0ms (4.5%)

Memory
24.0MiB live, 719.8MiB allocated; 263ms collecting garbage
Counts
62 → 637
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #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)))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(sin.f64 #s(approx (+ (* (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 (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
(exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.im))
(log.f64 x.im)
(*.f64 y.im (atan2.f64 x.im x.re))
(sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
(+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.im (log.f64 x.im))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im)
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
(+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))
#s(literal 1/2 binary64)
(/.f64 (*.f64 x.re x.re) x.im)
(*.f64 (atan2.f64 x.im x.re) y.re)
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im)
(log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
(+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))
(pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))
#s(literal 3 binary64)
(pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))
(+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(pow.f64 x.re #s(literal 4 binary64))
#s(literal 4 binary64)
(-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(pow.f64 x.im #s(literal 4 binary64))
(*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* 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))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* 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 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 x.im))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (* 1/2 (/ (* x.re x.re) x.im)) #s(hole binary64 (* 1/2 (/ (pow x.re 2) x.im))))
#s(approx (/ (* x.re x.re) x.im) #s(hole binary64 (/ (pow x.re 2) x.im)))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 x.im))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (pow x.im 2)))
#s(approx (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) #s(hole binary64 (pow x.im 6)))
#s(approx (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) #s(hole binary64 (+ (pow x.im 6) (pow x.re 6))))
#s(approx (pow (* x.re x.re) 3) #s(hole binary64 (pow x.re 6)))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (pow x.im 4)))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (* (pow x.im 2) (pow x.re 2))) (pow x.im 4))))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* (pow x.re 2) (- (pow x.re 2) (pow x.im 2))) (pow x.im 4))))
#s(approx (pow x.re 4) #s(hole binary64 (pow x.re 4)))
#s(approx (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) #s(hole binary64 (pow x.im 4)))
#s(approx (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (* -1 (* (pow x.im 2) (pow x.re 2))) (pow x.im 4))))
#s(approx (* (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (pow x.re 2))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* 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 (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* 1/2 (/ (pow x.re 2) x.im))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ 1 x.im)) (/ x.im (pow x.re 2))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))))))) (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))))))))))) (pow x.re 6)))))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/8 (/ (* (pow x.im 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/24 (/ (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/8 (/ (* (pow x.im 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/48 (/ (* (pow x.im 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))))) (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))) (/ (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/720 (/ (* y.im (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/720 (/ (* y.im (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* 1/24 (/ (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* 1/720 (/ (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 x.re))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))) (pow x.re 4))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4)))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (pow x.re 2)))
#s(approx (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* (pow x.re 2) (- (+ 1 (* -1 (/ (+ (* -1 (pow x.im 4)) (pow x.im 4)) (pow x.re 4)))) (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* (pow x.re 2) (- (+ 1 (* -1 (/ (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))) (pow x.re 6)))) (+ (* -1 (/ (pow x.im 2) (pow x.re 2))) (+ (* -1 (/ (pow x.im 4) (pow x.re 4))) (/ (pow x.im 4) (pow x.re 4))))))))
#s(approx (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) #s(hole binary64 (pow x.re 6)))
#s(approx (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) #s(hole binary64 (* (pow x.re 6) (+ 1 (/ (pow x.im 6) (pow x.re 6))))))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (pow x.re 4)))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* (pow x.re 4) (+ 1 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* (pow x.re 4) (- (+ 1 (/ (pow x.im 4) (pow x.re 4))) (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* (pow x.im 2) (pow x.re 2)))))
#s(approx (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* (pow x.re 2) (- (/ (pow x.im 4) (pow x.re 2)) (pow x.im 2)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))))))) (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))))))))))) (pow x.re 6)))))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/8 (/ (* (pow x.im 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/24 (/ (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/8 (/ (* (pow x.im 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/48 (/ (* (pow x.im 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))))) (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))) (/ (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/720 (/ (* y.im (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/720 (/ (* y.im (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* 1/24 (/ (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* 1/720 (/ (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))) (pow x.re 4))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4)))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (log x.im))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (* y.im (log x.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 (* y.im (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (/ (+ (* 1/2 (pow x.re 2)) (pow x.im 2)) x.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (pow (* x.im x.im) 3) #s(hole binary64 (pow x.im 6)))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (* (pow x.im 2) (pow x.re 2))) (pow x.re 4))))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* (pow x.im 2) (- (pow x.im 2) (pow x.re 2))) (pow x.re 4))))
#s(approx (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* (pow x.im 2) (- (pow x.im 2) (pow x.re 2)))))
#s(approx (pow x.im 4) #s(hole binary64 (pow x.im 4)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* 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 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (log x.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))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))))))) (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))))))))))) (pow x.im 6)))))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/8 (/ (* (pow x.re 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/24 (/ (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/8 (/ (* (pow x.re 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/48 (/ (* (pow x.re 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))))) (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))) (/ (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/720 (/ (* y.im (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/720 (/ (* y.im (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* 1/24 (/ (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* 1/720 (/ (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))) (pow x.im 4))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4)))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* (pow x.im 2) (- (+ 1 (* -1 (/ (+ (* -1 (pow x.re 4)) (pow x.re 4)) (pow x.im 4)))) (* -1 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* (pow x.im 2) (- (+ 1 (* -1 (/ (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))) (pow x.im 6)))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (pow x.re 4) (pow x.im 4))) (/ (pow x.re 4) (pow x.im 4))))))))
#s(approx (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) #s(hole binary64 (* (pow x.im 6) (+ 1 (/ (pow x.re 6) (pow x.im 6))))))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* (pow x.im 4) (+ 1 (* -1 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* (pow x.im 4) (- (+ 1 (/ (pow x.re 4) (pow x.im 4))) (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* (pow x.im 4) (+ 1 (* -1 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (log x.im)) #s(hole binary64 (* y.im (+ (log -1) (* -1 (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))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* -1 (* x.im (- (* -1/2 (/ (pow x.re 2) (pow x.im 2))) 1)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))))))) (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))))))))))) (pow x.im 6)))))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/8 (/ (* (pow x.re 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/24 (/ (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/8 (/ (* (pow x.re 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/48 (/ (* (pow x.re 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))))) (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))) (/ (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/720 (/ (* y.im (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/720 (/ (* y.im (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* 1/24 (/ (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* 1/720 (/ (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))) (pow x.im 4))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4)))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))) (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* y.re (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (log x.im))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (log x.im) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))) y.re) (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log x.im)) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.im y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (pow x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.im y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (* (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (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 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.im (- (/ (* y.re (log x.im)) y.im) (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (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)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log x.im)) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
Calls

12 calls:

TimeVariablePointExpression
146.0ms
y.im
@0
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (* y.re (log x.im)) (log x.im) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.im (log x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) x.im) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (pow (* x.re x.re) 3) 3 (pow (* x.im x.im) 3) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) (pow x.re 4) 4 (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))
50.0ms
x.re
@inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (* y.re (log x.im)) (log x.im) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.im (log x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) x.im) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (pow (* x.re x.re) 3) 3 (pow (* x.im x.im) 3) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) (pow x.re 4) 4 (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))
47.0ms
x.im
@-inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (* y.re (log x.im)) (log x.im) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.im (log x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) x.im) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (pow (* x.re x.re) 3) 3 (pow (* x.im x.im) 3) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) (pow x.re 4) 4 (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))
42.0ms
y.re
@0
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (* y.re (log x.im)) (log x.im) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.im (log x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) x.im) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (pow (* x.re x.re) 3) 3 (pow (* x.im x.im) 3) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) (pow x.re 4) 4 (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))
32.0ms
y.im
@-inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (* y.re (log x.im)) (log x.im) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.im (log x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) x.im) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (pow (* x.re x.re) 3) 3 (pow (* x.im x.im) 3) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) (pow x.re 4) 4 (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))

rewrite354.0ms (3%)

Memory
53.4MiB live, 541.6MiB allocated; 60ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0297950425
0308749874
01018449874
Stop Event
iter limit
node limit
iter limit
Counts
699 → 744
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #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)))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(sin.f64 #s(approx (+ (* (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 (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
(exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.im))
(log.f64 x.im)
(*.f64 y.im (atan2.f64 x.im x.re))
(sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
(+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.im (log.f64 x.im))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im)
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
(+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))
#s(literal 1/2 binary64)
(/.f64 (*.f64 x.re x.re) x.im)
(*.f64 (atan2.f64 x.im x.re) y.re)
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im)
(log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
(+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))
(pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))
#s(literal 3 binary64)
(pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))
(+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(pow.f64 x.re #s(literal 4 binary64))
#s(literal 4 binary64)
(-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(pow.f64 x.im #s(literal 4 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) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* 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))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* 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 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 x.im))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (* 1/2 (/ (* x.re x.re) x.im)) #s(hole binary64 (* 1/2 (/ (pow x.re 2) x.im))))
#s(approx (/ (* x.re x.re) x.im) #s(hole binary64 (/ (pow x.re 2) x.im)))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 x.im))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (pow x.im 2)))
#s(approx (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) #s(hole binary64 (pow x.im 6)))
#s(approx (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) #s(hole binary64 (+ (pow x.im 6) (pow x.re 6))))
#s(approx (pow (* x.re x.re) 3) #s(hole binary64 (pow x.re 6)))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (pow x.im 4)))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (* (pow x.im 2) (pow x.re 2))) (pow x.im 4))))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* (pow x.re 2) (- (pow x.re 2) (pow x.im 2))) (pow x.im 4))))
#s(approx (pow x.re 4) #s(hole binary64 (pow x.re 4)))
#s(approx (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) #s(hole binary64 (pow x.im 4)))
#s(approx (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (* -1 (* (pow x.im 2) (pow x.re 2))) (pow x.im 4))))
#s(approx (* (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (pow x.re 2))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* 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 (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* 1/2 (/ (pow x.re 2) x.im))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ 1 x.im)) (/ x.im (pow x.re 2))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))))))) (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))))))))))) (pow x.re 6)))))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/8 (/ (* (pow x.im 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/24 (/ (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/8 (/ (* (pow x.im 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/48 (/ (* (pow x.im 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))))) (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))) (/ (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/720 (/ (* y.im (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/720 (/ (* y.im (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* 1/24 (/ (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* 1/720 (/ (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 x.re))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))) (pow x.re 4))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4)))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (pow x.re 2)))
#s(approx (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* (pow x.re 2) (- (+ 1 (* -1 (/ (+ (* -1 (pow x.im 4)) (pow x.im 4)) (pow x.re 4)))) (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* (pow x.re 2) (- (+ 1 (* -1 (/ (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))) (pow x.re 6)))) (+ (* -1 (/ (pow x.im 2) (pow x.re 2))) (+ (* -1 (/ (pow x.im 4) (pow x.re 4))) (/ (pow x.im 4) (pow x.re 4))))))))
#s(approx (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) #s(hole binary64 (pow x.re 6)))
#s(approx (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) #s(hole binary64 (* (pow x.re 6) (+ 1 (/ (pow x.im 6) (pow x.re 6))))))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (pow x.re 4)))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* (pow x.re 4) (+ 1 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* (pow x.re 4) (- (+ 1 (/ (pow x.im 4) (pow x.re 4))) (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* (pow x.im 2) (pow x.re 2)))))
#s(approx (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* (pow x.re 2) (- (/ (pow x.im 4) (pow x.re 2)) (pow x.im 2)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))))))) (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))))))))))) (pow x.re 6)))))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/8 (/ (* (pow x.im 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/24 (/ (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/8 (/ (* (pow x.im 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/48 (/ (* (pow x.im 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))))) (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))) (/ (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/720 (/ (* y.im (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/720 (/ (* y.im (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* 1/24 (/ (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* 1/720 (/ (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))) (pow x.re 4))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4)))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (log x.im))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (* y.im (log x.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 (* y.im (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (/ (+ (* 1/2 (pow x.re 2)) (pow x.im 2)) x.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (pow (* x.im x.im) 3) #s(hole binary64 (pow x.im 6)))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (* (pow x.im 2) (pow x.re 2))) (pow x.re 4))))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* (pow x.im 2) (- (pow x.im 2) (pow x.re 2))) (pow x.re 4))))
#s(approx (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* (pow x.im 2) (- (pow x.im 2) (pow x.re 2)))))
#s(approx (pow x.im 4) #s(hole binary64 (pow x.im 4)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* 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 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (log x.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))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))))))) (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))))))))))) (pow x.im 6)))))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/8 (/ (* (pow x.re 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/24 (/ (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/8 (/ (* (pow x.re 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/48 (/ (* (pow x.re 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))))) (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))) (/ (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/720 (/ (* y.im (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/720 (/ (* y.im (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* 1/24 (/ (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* 1/720 (/ (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))) (pow x.im 4))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4)))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* (pow x.im 2) (- (+ 1 (* -1 (/ (+ (* -1 (pow x.re 4)) (pow x.re 4)) (pow x.im 4)))) (* -1 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) #s(hole binary64 (* (pow x.im 2) (- (+ 1 (* -1 (/ (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))) (pow x.im 6)))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (pow x.re 4) (pow x.im 4))) (/ (pow x.re 4) (pow x.im 4))))))))
#s(approx (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) #s(hole binary64 (* (pow x.im 6) (+ 1 (/ (pow x.re 6) (pow x.im 6))))))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* (pow x.im 4) (+ 1 (* -1 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* (pow x.im 4) (- (+ 1 (/ (pow x.re 4) (pow x.im 4))) (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* (pow x.im 4) (+ 1 (* -1 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (log x.im)) #s(hole binary64 (* y.im (+ (log -1) (* -1 (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))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* -1 (* x.im (- (* -1/2 (/ (pow x.re 2) (pow x.im 2))) 1)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))))))) (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))))))))))) (pow x.im 6)))))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/8 (/ (* (pow x.re 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/24 (/ (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/8 (/ (* (pow x.re 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/48 (/ (* (pow x.re 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))))) (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))) (/ (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.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/720 (/ (* y.im (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/720 (/ (* y.im (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* 1/24 (/ (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* 1/720 (/ (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))) (pow x.im 4))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4)))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))) (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* y.re (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (log x.im))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (log x.im) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))) y.re) (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log x.im)) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.im y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (pow x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.im y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (* (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) #s(hole binary64 (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (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 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.im (- (/ (* y.re (log x.im)) y.im) (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (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)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log x.im)) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
Outputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
(/.f64 (exp.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 (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))))
(pow.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
(+.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)))
x.re
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(sin.f64 #s(approx (+ (* (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 (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 y.re #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re))
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
(/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(exp.f64 (-.f64 (*.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)))))
(-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.im))
(log.f64 (pow.f64 x.im y.re))
(log.f64 x.im)
(*.f64 y.im (atan2.f64 x.im x.re))
(sin.f64 (+.f64 (*.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))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(/.f64 (+.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 3 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.im (log.f64 x.im))) (-.f64 (*.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
(+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.im (log.f64 x.im))
(log.f64 (pow.f64 x.im y.im))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im)) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im)
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
(/.f64 (+.f64 (pow.f64 x.im #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)) #s(literal 3 binary64))) (+.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))) (*.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))))
(+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))
#s(literal 1/2 binary64)
(/.f64 (neg.f64 (*.f64 x.re x.re)) (neg.f64 x.im))
(/.f64 (*.f64 x.re x.re) x.im)
(*.f64 (atan2.f64 x.im x.re) y.re)
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 (sin.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) 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 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im) (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) 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 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(+.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im)
(log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
(pow.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
(+.f64 (/.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) (/.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
(*.f64 (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(/.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (-.f64 (*.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))
(+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))
(*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 x.re x.re))
(*.f64 (pow.f64 x.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 3 binary64)))
(*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))
(pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 x.re x.re)) #s(literal 3 binary64)))
#s(literal 3 binary64)
(*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 x.im x.im))
(*.f64 (pow.f64 x.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 3 binary64)))
(*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))
(pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 x.im x.im)) #s(literal 3 binary64)))
(/.f64 (+.f64 (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (-.f64 (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
(+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(pow.f64 x.re #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 4 binary64)))
#s(literal 4 binary64)
(-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(pow.f64 x.im #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 4 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) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.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) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.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) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (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 (+.f64 (*.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 (+.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.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 (+.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.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) (+.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.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) (+.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.im x.im))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx x.re x.re)
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.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) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.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) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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) (sin.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.im)) (+.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) 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)) (+.f64 (*.f64 y.im (log.f64 x.im)) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (*.f64 x.im x.im))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (*.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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (*.f64 (*.f64 x.re x.re) (+.f64 (*.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 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (*.f64 (*.f64 x.re x.re) (+.f64 (*.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 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))) (pow.f64 x.im y.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (+ (* x.im x.im) (* 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 x.re x.re)))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.im (atan2 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (+.f64 (*.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))) (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.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) (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.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) (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) x.im)
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (* 1/2 (/ (* x.re x.re) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))
#s(approx (/ (* x.re x.re) x.im) (/.f64 (*.f64 x.re x.re) x.im))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.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) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.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) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.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) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.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) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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) (sin.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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) y.im) (*.f64 x.im x.im))) (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.im)) (+.f64 (*.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) 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.im)) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (*.f64 y.im (log.f64 x.im)))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (+.f64 (*.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (log.f64 x.im))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) x.im)
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) (*.f64 x.im x.im))
#s(approx (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
#s(approx (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (pow.f64 x.im #s(literal 6 binary64)))
#s(approx (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))))
#s(approx (pow (* x.re x.re) 3) (pow.f64 x.re #s(literal 6 binary64)))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) (pow.f64 x.im #s(literal 4 binary64)))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (pow x.re 4) (pow.f64 x.re #s(literal 4 binary64)))
#s(approx (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) (pow.f64 x.im #s(literal 4 binary64)))
#s(approx (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (* (* x.re x.re) (* x.im x.im)) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.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 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.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)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (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))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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 (neg.f64 (log.f64 x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (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))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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 (neg.f64 (log.f64 x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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 (neg.f64 (log.f64 x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 (sin.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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (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 (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (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 (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64))) (/.f64 x.im (*.f64 x.re x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.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 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (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 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (+.f64 (*.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) x.re)
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 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.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) (*.f64 x.re x.re))
#s(approx (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) (*.f64 (*.f64 x.re x.re) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) (*.f64 (*.f64 x.re x.re) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (pow.f64 x.re #s(literal 6 binary64)))
#s(approx (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))))))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) (pow.f64 x.re #s(literal 4 binary64)))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) (*.f64 (*.f64 x.re x.re) (-.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.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) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.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 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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 (+.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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)))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 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)))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 #s(literal -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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.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 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (*.f64 y.re (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))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (*.f64 y.re (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))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (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))) (*.f64 (sin.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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (pow (sqrt (+ (* x.im x.im) (* x.re x.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 #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 (pow (sqrt (+ (* x.im x.im) (* x.re x.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/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))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.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/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 (*.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/4 binary64) (*.f64 (pow.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 (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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re 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) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #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) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.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 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (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 (+.f64 (*.f64 #s(literal -1 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (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 (+.f64 (*.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 (+.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.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 (+.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.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) (+.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.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) (+.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx x.im x.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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) (sin.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.re)) (+.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) 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)) (+.f64 (*.f64 y.im (log.f64 x.re)) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (*.f64 x.re x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (*.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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (*.f64 (*.f64 x.im x.im) (+.f64 (*.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 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (*.f64 (*.f64 x.im x.im) (+.f64 (*.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 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))) (pow.f64 x.re y.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (* y.re (log x.im)) (*.f64 y.re (log.f64 x.im)))
#s(approx (log x.im) (log.f64 x.im))
#s(approx (* y.im (log x.im)) (*.f64 y.im (log.f64 x.im)))
#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) (+.f64 (*.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) (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.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) (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im)) x.im))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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) (sin.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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) y.im) (*.f64 x.re x.re))) (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.re)) (+.f64 (*.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) 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.re)) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (*.f64 y.im (log.f64 x.re)))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (+.f64 (*.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (log.f64 x.re))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (pow (* x.im x.im) 3) (pow.f64 x.im #s(literal 6 binary64)))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))))
#s(approx (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
#s(approx (pow x.im 4) (pow.f64 x.im #s(literal 4 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.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))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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 (neg.f64 (log.f64 x.im)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.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))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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 (neg.f64 (log.f64 x.im)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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 (neg.f64 (log.f64 x.im)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 (sin.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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (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 (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (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 (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.re (log x.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (log x.im) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.im (log x.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (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 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (+.f64 (*.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 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.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) (*.f64 (*.f64 x.im x.im) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))) (*.f64 (*.f64 x.im x.im) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (pow.f64 x.im #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))))))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.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) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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 (+.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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)))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 #s(literal -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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.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 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (*.f64 y.re (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))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (*.f64 y.re (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))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (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))) (*.f64 (sin.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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (pow (sqrt (+ (* x.im x.im) (* x.re x.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 #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 (pow (sqrt (+ (* x.im x.im) (* x.re x.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/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))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.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/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 (*.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/4 binary64) (*.f64 (pow.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 (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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (-.f64 (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.re (log x.im)) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))
#s(approx (log x.im) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (+.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.im (log x.im)) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))
#s(approx (* (log (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) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #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) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) #s(literal 1 binary64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.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 (*.f64 #s(literal -1 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/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.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 (*.f64 #s(literal -1 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/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (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 (+.f64 (*.f64 #s(literal -1 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 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) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.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 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx y.re y.re)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.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))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (+.f64 (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (+.f64 (*.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 (+.f64 (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/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 (+.f64 (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (*.f64 y.re y.re) (+.f64 (*.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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im)))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))))))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.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))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.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 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.re) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (*.f64 y.re (log.f64 x.im)))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (*.f64 y.re (+.f64 (log.f64 x.im) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))))) y.re) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (neg.f64 (log.f64 x.im)) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))))) y.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx y.im y.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.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 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.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 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64))))))) (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re)))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (pow.f64 x.im y.re)))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (log.f64 x.im))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.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 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))))))
#s(approx (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.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 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))))))
#s(approx (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 x.im)) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (log.f64 x.im)) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (neg.f64 (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 (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))

eval192.0ms (1.6%)

Memory
-34.1MiB live, 251.0MiB allocated; 110ms collecting garbage
Compiler

Compiled 110 513 to 5 943 computations (94.6% saved)

prune85.0ms (0.7%)

Memory
41.9MiB live, 133.7MiB allocated; 7ms collecting garbage
Pruning

33 alts after pruning (33 fresh and 0 done)

PrunedKeptTotal
New1 236281 264
Fresh11516
Picked505
Done000
Total1 252331 285
Accuracy
95.2%
Counts
1 285 → 33
Alt Table
Click to see full alt table
StatusAccuracyProgram
14.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))) (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im 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 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im 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 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))))
8.1%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (exp.f64 (*.f64 (log.f64 x.re) #s(literal 4 binary64))) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
27.1%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
24.3%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) (*.f64 #s(literal -1 binary64) x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
24.0%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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.6%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
45.2%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
9.7%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
29.8%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
19.3%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
34.7%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
36.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
34.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
36.9%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)))
39.4%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re)))) y.re)))
38.6%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))) y.re)))
33.5%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) y.re)))
31.5%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))) y.re)))
31.9%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re)) y.re)))
32.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))
27.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
32.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
12.8%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
11.2%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))
31.0%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re)))))))
31.5%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))))
22.2%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
43.3%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))
30.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (+.f64 (*.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)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))
23.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re)) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
11.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
14.2%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (+.f64 (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
20.0%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
Compiler

Compiled 4 246 to 2 202 computations (48.1% saved)

series465.0ms (4%)

Memory
-39.0MiB live, 769.7MiB allocated; 147ms collecting garbage
Counts
50 → 545
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
(+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
(log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re))
(pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)
(sqrt.f64 #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 x.re x.re))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.im (atan2.f64 x.im x.re))
(sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #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)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
(exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.im))
(log.f64 x.im)
(sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (* 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))))
(*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))
(+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))
(/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)
Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/24 (* (pow x.re 2) (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))))))))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/720 (* (pow x.re 2) (* y.im (+ (* -360 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 6))) (+ (* 1/48 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.im 6))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 6))))))))))) (* 1/24 (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))))))))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/24 (* (pow x.re 2) (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))))))))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/720 (* (pow x.re 2) (* y.im (+ (* -360 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 6))) (+ (* 1/48 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.im 6))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 6))))))))))) (* 1/24 (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4)))))))))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (log (pow x.im (cos (* y.re (atan2 x.im x.re)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (log (pow x.im (cos (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (log (pow x.im (cos (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/24 (* (pow x.re 2) (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4)))))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (log (pow x.im (cos (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/720 (* (pow x.re 2) (+ (* -360 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 6))) (+ (* 1/48 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.im 6))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 6)))))))))) (* 1/24 (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (pow x.im (cos (* y.re (atan2 x.im x.re))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im (cos (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (pow x.im (cos (* y.re (atan2 x.im x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow x.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4)))) (pow x.im (cos (* y.re (atan2 x.im x.re)))))))) (pow x.im (cos (* y.re (atan2 x.im x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow x.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4)))) (pow x.im (cos (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 6))) (+ (* 1/48 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.im 6))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 6))))) (pow x.im (cos (* y.re (atan2 x.im x.re)))))))))) (pow x.im (cos (* y.re (atan2 x.im x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* 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 (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (neg (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (+ (* (log (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 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))))
#s(approx (/ (* y.re (atan2 x.im x.re)) y.im) #s(hole binary64 (/ (* y.re (atan2 x.im x.re)) y.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/24 (* (pow x.im 2) (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))))))))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/720 (* (pow x.im 2) (* y.im (+ (* -360 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 6))) (+ (* 1/48 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.re 6))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 6))))))))))) (* 1/24 (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))))))))))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/24 (* (pow x.im 2) (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))))))))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/720 (* (pow x.im 2) (* y.im (+ (* -360 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 6))) (+ (* 1/48 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.re 6))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 6))))))))))) (* 1/24 (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4)))))))))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (log (pow x.re (cos (* y.re (atan2 x.im x.re)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (log (pow x.re (cos (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (log (pow x.re (cos (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/24 (* (pow x.im 2) (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4)))))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (log (pow x.re (cos (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/720 (* (pow x.im 2) (+ (* -360 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 6))) (+ (* 1/48 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.re 6))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 6)))))))))) (* 1/24 (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (pow x.re (cos (* y.re (atan2 x.im x.re))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re (cos (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (pow x.re (cos (* y.re (atan2 x.im x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow x.re (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4)))) (pow x.re (cos (* y.re (atan2 x.im x.re)))))))) (pow x.re (cos (* y.re (atan2 x.im x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow x.re (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4)))) (pow x.re (cos (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 6))) (+ (* 1/48 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.re 6))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 6))))) (pow x.re (cos (* y.re (atan2 x.im x.re)))))))))) (pow x.re (cos (* y.re (atan2 x.im x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (log x.im))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (log -1) (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log -1) (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (+ (* y.re (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (pow (atan2 x.im x.re) 3))))) (atan2 x.im x.re))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (pow (atan2 x.im x.re) 7))) (* 1/120 (pow (atan2 x.im x.re) 5)))))) (atan2 x.im x.re)))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* (pow y.re 2) (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* 1/24 (* y.im (* (pow y.re 2) (+ (* -3 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 24 (+ (* 1/24 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/8 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))))))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* (pow y.re 2) (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* (pow y.re 2) (+ (* 1/720 (* y.im (* (pow y.re 2) (+ (* -30 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 6))) (+ (* 360 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* 1/24 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/8 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4)))) (pow (atan2 x.im x.re) 2)))) (* 720 (+ (* -1/48 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 6))) (+ (* -1/48 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 6))) (* -1/720 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 6))))))))))) (* 1/24 (* y.im (+ (* -3 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 24 (+ (* 1/24 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/8 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4)))))))))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/2 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow y.re 2) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/24 (* (pow y.re 2) (+ (* -3 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 24 (+ (* 1/24 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/8 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4)))))))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow y.re 2) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (pow y.re 2) (+ (* 1/720 (* (pow y.re 2) (+ (* -30 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 6))) (+ (* 360 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* 1/24 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/8 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4)))) (pow (atan2 x.im x.re) 2)))) (* 720 (+ (* -1/48 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 6))) (+ (* -1/48 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 6))) (* -1/720 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 6)))))))))) (* 1/24 (+ (* -3 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 24 (+ (* 1/24 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/8 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sqrt (+ (pow x.im 2) (pow x.re 2)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sqrt (+ (pow x.im 2) (pow x.re 2))) (* -1/2 (* (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sqrt (+ (pow x.im 2) (pow x.re 2))) (* (pow y.re 2) (+ (* -1/2 (* (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)) (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* (* (pow y.re 2) (+ (* 1/24 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/8 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sqrt (+ (pow x.im 2) (pow x.re 2))) (* (pow y.re 2) (+ (* -1/2 (* (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)) (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* (pow y.re 2) (+ (* (* (pow y.re 2) (+ (* -1/48 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 6))) (+ (* -1/48 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 6))) (* -1/720 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 6)))))) (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* 1/24 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/8 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4)))) (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/24 (* (pow y.re 2) (pow (atan2 x.im x.re) 4))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (pow (atan2 x.im x.re) 6))) (* 1/24 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (log x.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) (cos (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) (cos (* y.re (atan2 x.im x.re))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) (cos (* y.re (atan2 x.im x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) (cos (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (log x.im))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (log x.im) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (* y.re (atan2 x.im x.re)) y.im)))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (+ (/ (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 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log x.im)) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (log x.im) y.re)) (* -1 (/ (atan2 x.im x.re) y.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 1))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.im y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (pow x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.im y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) (cos (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (+ (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) (cos (* 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)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.im (- (/ (* y.re (log x.im)) y.im) (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) (cos (* 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)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log x.im)) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
Calls

12 calls:

TimeVariablePointExpression
78.0ms
x.re
@-inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (cos (* y.re (atan2 x.im x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (* y.re (log x.im)) (log x.im) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))
66.0ms
y.re
@0
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (cos (* y.re (atan2 x.im x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (* y.re (log x.im)) (log x.im) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))
48.0ms
y.im
@0
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (cos (* y.re (atan2 x.im x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (* y.re (log x.im)) (log x.im) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))
40.0ms
y.re
@inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (cos (* y.re (atan2 x.im x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (* y.re (log x.im)) (log x.im) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))
39.0ms
y.re
@-inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (cos (* y.re (atan2 x.im x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (* y.re (log x.im)) (log x.im) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))

rewrite319.0ms (2.7%)

Memory
32.9MiB live, 461.9MiB allocated; 80ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0286438967
0293938666
0964438666
Stop Event
iter limit
node limit
iter limit
Counts
595 → 627
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
(+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
(log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re))
(pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)
(sqrt.f64 #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 x.re x.re))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.im (atan2.f64 x.im x.re))
(sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #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)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
(exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.im))
(log.f64 x.im)
(sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (* 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))))
(*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))
(+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))
(/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/24 (* (pow x.re 2) (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))))))))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/720 (* (pow x.re 2) (* y.im (+ (* -360 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 6))) (+ (* 1/48 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.im 6))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 6))))))))))) (* 1/24 (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))))))))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/24 (* (pow x.re 2) (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))))))))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/720 (* (pow x.re 2) (* y.im (+ (* -360 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 6))) (+ (* 1/48 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.im 6))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 6))))))))))) (* 1/24 (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4)))))))))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (log (pow x.im (cos (* y.re (atan2 x.im x.re)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (log (pow x.im (cos (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (log (pow x.im (cos (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/24 (* (pow x.re 2) (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4)))))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (log (pow x.im (cos (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/720 (* (pow x.re 2) (+ (* -360 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 6))) (+ (* 1/48 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.im 6))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 6)))))))))) (* 1/24 (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (pow x.im (cos (* y.re (atan2 x.im x.re))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im (cos (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (pow x.im (cos (* y.re (atan2 x.im x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow x.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4)))) (pow x.im (cos (* y.re (atan2 x.im x.re)))))))) (pow x.im (cos (* y.re (atan2 x.im x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow x.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4)))) (pow x.im (cos (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 6))) (+ (* 1/48 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.im 6))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 6))))) (pow x.im (cos (* y.re (atan2 x.im x.re)))))))))) (pow x.im (cos (* y.re (atan2 x.im x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* 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 (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (neg (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (+ (* (log (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 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))))
#s(approx (/ (* y.re (atan2 x.im x.re)) y.im) #s(hole binary64 (/ (* y.re (atan2 x.im x.re)) y.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/24 (* (pow x.im 2) (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))))))))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/720 (* (pow x.im 2) (* y.im (+ (* -360 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 6))) (+ (* 1/48 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.re 6))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 6))))))))))) (* 1/24 (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))))))))))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/24 (* (pow x.im 2) (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))))))))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/720 (* (pow x.im 2) (* y.im (+ (* -360 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 6))) (+ (* 1/48 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.re 6))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 6))))))))))) (* 1/24 (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4)))))))))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (log (pow x.re (cos (* y.re (atan2 x.im x.re)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (log (pow x.re (cos (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (log (pow x.re (cos (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/24 (* (pow x.im 2) (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4)))))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (log (pow x.re (cos (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/720 (* (pow x.im 2) (+ (* -360 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 6))) (+ (* 1/48 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.re 6))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 6)))))))))) (* 1/24 (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (pow x.re (cos (* y.re (atan2 x.im x.re))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (pow x.re (cos (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (pow x.re (cos (* y.re (atan2 x.im x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow x.re (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4)))) (pow x.re (cos (* y.re (atan2 x.im x.re)))))))) (pow x.re (cos (* y.re (atan2 x.im x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow x.re (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4)))) (pow x.re (cos (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 6))) (+ (* 1/48 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.re 6))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 6))))) (pow x.re (cos (* y.re (atan2 x.im x.re)))))))))) (pow x.re (cos (* y.re (atan2 x.im x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (log x.im))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (log -1) (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log -1) (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (+ (* y.re (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (pow (atan2 x.im x.re) 3))))) (atan2 x.im x.re))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (pow (atan2 x.im x.re) 7))) (* 1/120 (pow (atan2 x.im x.re) 5)))))) (atan2 x.im x.re)))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* (pow y.re 2) (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* 1/24 (* y.im (* (pow y.re 2) (+ (* -3 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 24 (+ (* 1/24 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/8 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))))))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* (pow y.re 2) (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* (pow y.re 2) (+ (* 1/720 (* y.im (* (pow y.re 2) (+ (* -30 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 6))) (+ (* 360 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* 1/24 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/8 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4)))) (pow (atan2 x.im x.re) 2)))) (* 720 (+ (* -1/48 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 6))) (+ (* -1/48 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 6))) (* -1/720 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 6))))))))))) (* 1/24 (* y.im (+ (* -3 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 24 (+ (* 1/24 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/8 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4)))))))))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/2 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow y.re 2) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/24 (* (pow y.re 2) (+ (* -3 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 24 (+ (* 1/24 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/8 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4)))))))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow y.re 2) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (pow y.re 2) (+ (* 1/720 (* (pow y.re 2) (+ (* -30 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 6))) (+ (* 360 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* 1/24 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/8 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4)))) (pow (atan2 x.im x.re) 2)))) (* 720 (+ (* -1/48 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 6))) (+ (* -1/48 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 6))) (* -1/720 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 6)))))))))) (* 1/24 (+ (* -3 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 24 (+ (* 1/24 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/8 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sqrt (+ (pow x.im 2) (pow x.re 2)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sqrt (+ (pow x.im 2) (pow x.re 2))) (* -1/2 (* (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sqrt (+ (pow x.im 2) (pow x.re 2))) (* (pow y.re 2) (+ (* -1/2 (* (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)) (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* (* (pow y.re 2) (+ (* 1/24 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/8 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sqrt (+ (pow x.im 2) (pow x.re 2))) (* (pow y.re 2) (+ (* -1/2 (* (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)) (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* (pow y.re 2) (+ (* (* (pow y.re 2) (+ (* -1/48 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 6))) (+ (* -1/48 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 6))) (* -1/720 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 6)))))) (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* 1/24 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/8 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4)))) (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/24 (* (pow y.re 2) (pow (atan2 x.im x.re) 4))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (pow (atan2 x.im x.re) 6))) (* 1/24 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (log x.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) (cos (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) (cos (* y.re (atan2 x.im x.re))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) #s(hole binary64 (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) (cos (* y.re (atan2 x.im x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) (cos (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (log x.im))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (log x.im) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (* y.re (atan2 x.im x.re)) y.im)))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (+ (/ (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 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log x.im)) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (log x.im) y.re)) (* -1 (/ (atan2 x.im x.re) y.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 1))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.im y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (pow x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.im y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) (cos (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (+ (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) (cos (* 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)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.im (- (/ (* y.re (log x.im)) y.im) (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) (cos (* 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)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log x.im)) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
Outputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
(/.f64 (exp.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 (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))))
(pow.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
(+.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)))
x.re
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))
(+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
(log.f64 (pow.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
(sin.f64 (+.f64 (*.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)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re))
(pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)
(pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re)) (/.f64 y.re #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re)))) y.re))
(pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 #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 x.re x.re))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.im (atan2.f64 x.im x.re))
(sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #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)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
(/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.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)))))
(-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.im))
(log.f64 (pow.f64 x.im y.re))
(log.f64 x.im)
(sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (* 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))))
(*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))
(/.f64 (+.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im) #s(literal 3 binary64))) (+.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (-.f64 (*.f64 (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) (*.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
(+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))
(/.f64 (neg.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 y.im))
(/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.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) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.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) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (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 (+.f64 (*.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 (+.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.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 (+.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.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) (+.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.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) (+.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.im x.im))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx x.re x.re)
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.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) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.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) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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) (sin.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.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/720 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.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/720 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -360 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))))))))))) (*.f64 #s(literal 1/24 binary64) (+.f64 (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (pow.f64 x.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (pow.f64 x.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (+ (* x.im x.im) (* 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 x.re x.re)))
#s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (*.f64 x.im x.im))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (*.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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (*.f64 (*.f64 x.re x.re) (+.f64 (*.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 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (*.f64 (*.f64 x.re x.re) (+.f64 (*.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 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))) (pow.f64 x.im y.re)))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (neg (* y.im (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.im (atan2 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.im)) (+.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) 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)) (+.f64 (*.f64 y.im (log.f64 x.im)) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (+.f64 (*.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))) (+.f64 (*.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)) y.im))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))
#s(approx (/ (* y.re (atan2 x.im x.re)) y.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.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 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.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)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.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)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.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)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.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)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (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))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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 (neg.f64 (log.f64 x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (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))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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 (neg.f64 (log.f64 x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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 (neg.f64 (log.f64 x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 (sin.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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (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 (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (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 (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.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 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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 (+.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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)))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 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)))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 #s(literal -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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.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)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.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)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.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)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 x.re x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.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 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (*.f64 y.re (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))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (*.f64 y.re (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))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (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))) (*.f64 (sin.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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (pow (sqrt (+ (* x.im x.im) (* x.re x.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 #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 (pow (sqrt (+ (* x.im x.im) (* x.re x.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/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))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.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/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 (*.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/4 binary64) (*.f64 (pow.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 (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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (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 (+.f64 (*.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 (+.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.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 (+.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.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) (+.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.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) (+.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx x.im x.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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) (sin.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.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/720 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.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/720 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -360 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))))))))))) (*.f64 #s(literal 1/24 binary64) (+.f64 (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (pow.f64 x.re (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (pow.f64 x.re (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (*.f64 x.re x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (*.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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (*.f64 (*.f64 x.im x.im) (+.f64 (*.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 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (*.f64 (*.f64 x.im x.im) (+.f64 (*.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 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (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)) (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.re)) (+.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) 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)) (+.f64 (*.f64 y.im (log.f64 x.re)) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* y.re (log x.im)) (*.f64 y.re (log.f64 x.im)))
#s(approx (log x.im) (log.f64 x.im))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.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)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.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)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.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)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.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))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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 (neg.f64 (log.f64 x.im)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.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))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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 (neg.f64 (log.f64 x.im)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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 (neg.f64 (log.f64 x.im)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 (sin.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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (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 (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (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 (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.re (log x.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (log x.im) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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 (+.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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)))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 #s(literal -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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.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)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.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)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.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)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 x.im x.im))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.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))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.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 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (*.f64 y.re (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))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (*.f64 y.re (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))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (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))) (*.f64 (sin.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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (pow (sqrt (+ (* x.im x.im) (* x.re x.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 #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 (pow (sqrt (+ (* x.im x.im) (* x.re x.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/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))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.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/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 (*.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/4 binary64) (*.f64 (pow.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 (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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (-.f64 (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.re (log x.im)) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))
#s(approx (log x.im) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (+.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (log.f64 #s(literal -1 binary64)) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.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 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx y.re y.re)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.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))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (atan2.f64 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (+.f64 (*.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 (+.f64 (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/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 (+.f64 (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64)))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))) (atan2.f64 x.im x.re))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -30 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 360 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)))) (*.f64 #s(literal -1/720 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -30 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 360 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)))) (*.f64 #s(literal -1/720 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))))))))))) (*.f64 #s(literal 1/24 binary64) (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)))) (*.f64 #s(literal -1/720 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))))))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)))) (*.f64 #s(literal 1/24 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (+.f64 (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im)))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im)))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.im (log.f64 x.im)))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (log.f64 x.im))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.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))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.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 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))) (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.re) (atan2.f64 x.im x.re))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (*.f64 y.re (log.f64 x.im)))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (*.f64 y.re (+.f64 (log.f64 x.im) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (*.f64 y.re (+.f64 (/.f64 (log.f64 x.im) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (neg.f64 (log.f64 x.im)) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) y.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) y.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 x.im) y.re)) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx y.im y.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.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 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.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 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64))))))) (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)) (*.f64 y.im (+.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(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re)))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (pow.f64 x.im y.re)))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (log.f64 x.im))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (/.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.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 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (+.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.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)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 x.im)) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.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)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (log.f64 x.im)) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (neg.f64 (log.f64 x.im)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (neg.f64 (log.f64 x.im)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))

eval162.0ms (1.4%)

Memory
-14.0MiB live, 211.8MiB allocated; 39ms collecting garbage
Compiler

Compiled 75 377 to 4 982 computations (93.4% saved)

prune62.0ms (0.5%)

Memory
39.3MiB live, 137.5MiB allocated; 18ms collecting garbage
Pruning

34 alts after pruning (32 fresh and 2 done)

PrunedKeptTotal
New74811759
Fresh72128
Picked325
Done000
Total75834792
Accuracy
95.2%
Counts
792 → 34
Alt Table
Click to see full alt table
StatusAccuracyProgram
14.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))) (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im 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 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im 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 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))))
8.1%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (exp.f64 (*.f64 (log.f64 x.re) #s(literal 4 binary64))) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
24.0%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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))))
47.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))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
9.7%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
29.8%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
19.3%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
36.2%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
22.9%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
34.7%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
20.2%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.re) (atan2.f64 x.im x.re))))))
22.2%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
11.1%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
11.2%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
36.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
36.9%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)))
39.4%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re)))) y.re)))
38.6%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))) y.re)))
33.5%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) y.re)))
31.5%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))) y.re)))
32.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))
27.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
32.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
12.8%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
31.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im #s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (*.f64 y.re (+.f64 (/.f64 (log.f64 x.im) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))))))))
43.3%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.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))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
30.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (+.f64 (*.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)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))
24.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (+.f64 (*.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)))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
23.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re)) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
18.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re)) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))))
11.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
14.2%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (+.f64 (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
20.0%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
Compiler

Compiled 4 388 to 2 231 computations (49.2% saved)

series488.0ms (4.2%)

Memory
-53.3MiB live, 683.7MiB allocated; 184ms collecting garbage
Counts
57 → 598
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64)))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))
#s(literal 1 binary64)
(sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#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 y.re (atan2.f64 x.im x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))) y.re)))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))) y.re))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))) y.re)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
(+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))
#s(literal 1/2 binary64)
(/.f64 (*.f64 x.re x.re) x.im)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re)) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))))
(*.f64 #s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re)) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re))
(pow.f64 x.im y.re)
(sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (* 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))))
(*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))
(+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))
(log.f64 x.im)
(/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
(exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.re))
(log.f64 x.re)
(*.f64 y.im (atan2.f64 x.im x.re))
(sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
(+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.im (log.f64 x.re))
Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/24 (* (pow x.re 2) (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))))))))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/720 (* (pow x.re 2) (* y.im (+ (* -360 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 6))) (+ (* 1/48 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.im 6))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 6))))))))))) (* 1/24 (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))))))))))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* 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 (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* 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 (* 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))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 x.im))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (* 1/2 (/ (* x.re x.re) x.im)) #s(hole binary64 (* 1/2 (/ (pow x.re 2) x.im))))
#s(approx (/ (* x.re x.re) x.im) #s(hole binary64 (/ (pow x.re 2) x.im)))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))))
#s(approx (/ (* y.re (atan2 x.im x.re)) y.im) #s(hole binary64 (/ (* y.re (atan2 x.im x.re)) y.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* y.re (log x.re))))
#s(approx (log x.re) #s(hole binary64 (log x.re)))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (log x.re)) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.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)))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* 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 (+ (* (log (sqrt (+ (* x.re x.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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* 1/2 (/ (pow x.re 2) x.im))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ 1 x.im)) (/ x.im (pow x.re 2))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))))))) (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))))))))))) (pow x.re 6)))))))))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (log x.re) #s(hole binary64 (* -1 (log (/ 1 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 (+ (* 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 (* y.im (log x.re)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.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)))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))))))) (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))))))))))) (pow x.re 6)))))))))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.re)))))))
#s(approx (log x.re) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 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 (+ (* 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 (* y.im (log x.re)) #s(hole binary64 (* y.im (+ (log -1) (* -1 (log (/ -1 x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/24 (* (pow x.im 2) (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))))))))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/720 (* (pow x.im 2) (* y.im (+ (* -360 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 6))) (+ (* 1/48 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.re 6))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 6))))))))))) (* 1/24 (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))))))))))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (+ (* (log (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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (/ (+ (* 1/2 (pow x.re 2)) (pow x.im 2)) x.im)))
#s(approx (pow x.im y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.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)))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* 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 (+ (* (log (sqrt (+ (* x.re x.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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (pow x.im y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))))))) (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))))))))))) (pow x.im 6)))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.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)))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* -1 (* x.im (- (* -1/2 (/ (pow x.re 2) (pow x.im 2))) 1)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re))))))
#s(approx (pow x.im y.re) #s(hole binary64 (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (log -1) (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log -1) (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))))))) (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))))))))))) (pow x.im 6)))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (+ (* y.re (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (pow (atan2 x.im x.re) 3))))) (atan2 x.im x.re))))))
#s(approx (+ (* (log (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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))))
#s(approx (pow x.im y.re) #s(hole binary64 1))
#s(approx (pow x.im y.re) #s(hole binary64 (+ 1 (* y.re (log x.im)))))
#s(approx (pow x.im y.re) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* 1/2 (* y.re (pow (log x.im) 2))))))))
#s(approx (pow x.im y.re) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (log x.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))) (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.re))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (sin (* y.im (log x.re))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.re)))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (sin (* y.im (log x.re)))))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (sin (* y.im (log x.re)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.re)))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (sin (* y.im (log x.re)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 3) (sin (* y.im (log x.re)))))) (* 1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (sin (* y.im (log x.re)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) (cos (* y.re (atan2 x.im x.re)))))))))
#s(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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (* y.re (atan2 x.im x.re)) y.im)))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (+ (/ (log x.im) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (log x.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (log x.re) (* -1 (/ (* 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 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (log x.im) y.re)) (* -1 (/ (atan2 x.im x.re) y.im)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log x.re)) (/ (* 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 1))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.im y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (pow x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.im y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (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 (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) y.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re y.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.re y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))) (pow x.re y.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.re y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.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 (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) (cos (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (+ (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) (cos (* 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)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.im (- (/ (* y.re (log x.re)) y.im) (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)) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) (cos (* 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)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log x.re)) y.im)) (* -1 (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 (+ (* -1 (log x.re)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
Calls

12 calls:

TimeVariablePointExpression
92.0ms
y.re
@inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp (neg (* y.im (atan2 x.im x.re)))) 1 (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow x.im y.re) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) 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))))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (log x.re) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (* y.im (log x.re)))
59.0ms
x.re
@-inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp (neg (* y.im (atan2 x.im x.re)))) 1 (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow x.im y.re) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) 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))))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (log x.re) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (* y.im (log x.re)))
42.0ms
y.re
@0
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp (neg (* y.im (atan2 x.im x.re)))) 1 (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow x.im y.re) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) 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))))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (log x.re) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (* y.im (log x.re)))
34.0ms
x.im
@-inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp (neg (* y.im (atan2 x.im x.re)))) 1 (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow x.im y.re) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) 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))))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (log x.re) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (* y.im (log x.re)))
34.0ms
y.im
@inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp (neg (* y.im (atan2 x.im x.re)))) 1 (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow x.im y.re) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) 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))))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (log x.re) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (* y.im (log x.re)))

rewrite438.0ms (3.8%)

Memory
54.9MiB live, 473.1MiB allocated; 91ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0317444634
0325044168
01086444168
Stop Event
iter limit
node limit
iter limit
Counts
655 → 682
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64)))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))
#s(literal 1 binary64)
(sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#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 y.re (atan2.f64 x.im x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))) y.re)))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))) y.re))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))) y.re)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
(+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))
#s(literal 1/2 binary64)
(/.f64 (*.f64 x.re x.re) x.im)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re)) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))))
(*.f64 #s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re)) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re))
(pow.f64 x.im y.re)
(sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (* 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))))
(*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))
(+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))
(log.f64 x.im)
(/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
(exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.re))
(log.f64 x.re)
(*.f64 y.im (atan2.f64 x.im x.re))
(sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
(+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.im (log.f64 x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/24 (* (pow x.re 2) (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))))))))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (log (pow x.im (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/720 (* (pow x.re 2) (* y.im (+ (* -360 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 6))) (+ (* 1/48 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.im 6))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 6))))))))))) (* 1/24 (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.im 4))))))))))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* 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 (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* 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 (* 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))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 x.im))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (* 1/2 (/ (* x.re x.re) x.im)) #s(hole binary64 (* 1/2 (/ (pow x.re 2) x.im))))
#s(approx (/ (* x.re x.re) x.im) #s(hole binary64 (/ (pow x.re 2) x.im)))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))))
#s(approx (/ (* y.re (atan2 x.im x.re)) y.im) #s(hole binary64 (/ (* y.re (atan2 x.im x.re)) y.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* y.re (log x.re))))
#s(approx (log x.re) #s(hole binary64 (log x.re)))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (log x.re)) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.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)))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* 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 (+ (* (log (sqrt (+ (* x.re x.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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* 1/2 (/ (pow x.re 2) x.im))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ 1 x.im)) (/ x.im (pow x.re 2))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))))))) (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))))))))))) (pow x.re 6)))))))))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (log x.re) #s(hole binary64 (* -1 (log (/ 1 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 (+ (* 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 (* y.im (log x.re)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.im 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.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)))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4)))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4)))) (* -3 (pow x.im 4))))))) (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))) (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (pow x.im 4))))) (+ (* 30 (pow x.im 6)) (* 180 (* (pow x.im 2) (+ (* -1 (pow x.im 4)) (+ (* 1/4 (pow x.im 4)) (pow x.im 4))))))))))))) (pow x.re 6)))))))))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.re)))))))
#s(approx (log x.re) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 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 (+ (* 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 (* y.im (log x.re)) #s(hole binary64 (* y.im (+ (log -1) (* -1 (log (/ -1 x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/24 (* (pow x.im 2) (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))))))))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (log (pow x.re (cos (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/720 (* (pow x.im 2) (* y.im (+ (* -360 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 6))) (+ (* 1/48 (/ (pow (cos (* y.re (atan2 x.im x.re))) 3) (pow x.re 6))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 6))))))))))) (* 1/24 (* y.im (+ (* -3 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/8 (/ (pow (cos (* y.re (atan2 x.im x.re))) 2) (pow x.re 4))))))))))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (+ (* (log (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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (/ (+ (* 1/2 (pow x.re 2)) (pow x.im 2)) x.im)))
#s(approx (pow x.im y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.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)))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* 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 (+ (* (log (sqrt (+ (* x.re x.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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (pow x.im y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))))))) (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))))))))))) (pow x.im 6)))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* 1/720 (/ (* y.im (+ (* -360 (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (+ (* 30 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow (cos (* y.re (atan2 x.im x.re))) 3))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* y.im (+ (* -3 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* 1/8 (* (pow x.re 4) (pow (cos (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.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)))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* -1 (* x.im (- (* -1/2 (/ (pow x.re 2) (pow x.im 2))) 1)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re))))))
#s(approx (pow x.im y.re) #s(hole binary64 (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (log -1) (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log -1) (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* 1/24 (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4)))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 2) (* (pow y.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -12 (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4)))) (* -3 (pow x.re 4))))))) (* (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 (+ (* -360 (+ (* -1/2 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))) (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (pow x.re 4))))) (+ (* 30 (pow x.re 6)) (* 180 (* (pow x.re 2) (+ (* -1 (pow x.re 4)) (+ (* 1/4 (pow x.re 4)) (pow x.re 4))))))))))))) (pow x.im 6)))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (+ (* y.re (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (pow (atan2 x.im x.re) 3))))) (atan2 x.im x.re))))))
#s(approx (+ (* (log (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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))))
#s(approx (pow x.im y.re) #s(hole binary64 1))
#s(approx (pow x.im y.re) #s(hole binary64 (+ 1 (* y.re (log x.im)))))
#s(approx (pow x.im y.re) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* 1/2 (* y.re (pow (log x.im) 2))))))))
#s(approx (pow x.im y.re) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (log x.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))) (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (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 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.re))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (sin (* y.im (log x.re))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.re)))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (sin (* y.im (log x.re)))))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (sin (* y.im (log x.re)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.re)))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (sin (* y.im (log x.re)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 3) (sin (* y.im (log x.re)))))) (* 1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (sin (* y.im (log x.re)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) (cos (* y.re (atan2 x.im x.re)))))))))
#s(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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (* y.re (atan2 x.im x.re)) y.im)))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (+ (/ (log x.im) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2))))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (log x.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (log x.re) (* -1 (/ (* 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 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (log x.im) y.re)) (* -1 (/ (atan2 x.im x.re) y.im)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log x.re)) (/ (* 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 1))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.im y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (pow x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.im y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (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 (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) y.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (/ (+ (pow x.im 6) (pow x.re 6)) (- (+ (pow x.im 4) (pow x.re 4)) (* (pow x.im 2) (pow x.re 2)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re y.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.re y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))) (pow x.re y.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.re y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.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 (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) (cos (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (+ (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) (cos (* 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)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.im (- (/ (* y.re (log x.re)) y.im) (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)) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) (cos (* 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)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log x.re)) y.im)) (* -1 (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 (+ (* -1 (log x.re)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
Outputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(/.f64 (exp.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 (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))))
(pow.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
(+.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)))
x.re
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.im))
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64)))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))
#s(literal 1 binary64)
(sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#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 y.re (atan2.f64 x.im x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))) y.re)))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))) y.re))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))) y.re)
(exp.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
(/.f64 (+.f64 (pow.f64 x.im #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)) #s(literal 3 binary64))) (+.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))) (*.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))))
(+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))
#s(literal 1/2 binary64)
(/.f64 (neg.f64 (*.f64 x.re x.re)) (neg.f64 x.im))
(/.f64 (*.f64 x.re x.re) x.im)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re)) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))))
(*.f64 #s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re)) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re))
(pow.f64 x.im y.re)
(exp.f64 (*.f64 (log.f64 x.im) y.re))
(sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (* 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))))
(*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))
(/.f64 (+.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im) #s(literal 3 binary64))) (+.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (-.f64 (*.f64 (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) (*.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
(+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))
(log.f64 x.im)
(/.f64 (neg.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 y.im))
(/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.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))))
(exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
(-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.re))
(log.f64 (pow.f64 x.re y.re))
(log.f64 x.re)
(*.f64 y.im (atan2.f64 x.im x.re))
(sin.f64 (+.f64 (*.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))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(/.f64 (+.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.im (log.f64 x.re))) (-.f64 (*.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
(+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.im (log.f64 x.re))
(log.f64 (pow.f64 x.re y.im))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.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) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.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) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (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 (+.f64 (*.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 (+.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.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 (+.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.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) (+.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.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) (+.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.im x.im))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx x.re x.re)
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.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) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.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) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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) (sin.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.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/720 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 y.im (log.f64 x.im)))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.im (log.f64 x.im))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (+ (* x.im x.im) (* 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 x.re x.re)))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.im)) (+.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) 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)) (+.f64 (*.f64 y.im (log.f64 x.im)) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (*.f64 x.im x.im))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (*.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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (*.f64 (*.f64 x.re x.re) (+.f64 (*.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 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (*.f64 (*.f64 x.re x.re) (+.f64 (*.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 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))) (pow.f64 x.im y.re)))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) x.im)
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (* 1/2 (/ (* x.re x.re) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))
#s(approx (/ (* x.re x.re) x.im) (/.f64 (*.f64 x.re x.re) x.im))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (+.f64 (*.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))) (+.f64 (*.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)) y.im))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))
#s(approx (/ (* y.re (atan2 x.im x.re)) y.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.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) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.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) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.re (log x.re)) (*.f64 y.re (log.f64 x.re)))
#s(approx (log x.re) (log.f64 x.re))
#s(approx (* y.im (atan2 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (+.f64 (*.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))) (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.im (log x.re)) (*.f64 y.im (log.f64 x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.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 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.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)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.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)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (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))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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 (neg.f64 (log.f64 x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (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))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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 (neg.f64 (log.f64 x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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 (neg.f64 (log.f64 x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 (sin.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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (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 (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (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 (neg.f64 (log.f64 x.re)))))) (*.f64 x.re x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64))) (/.f64 x.im (*.f64 x.re x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.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 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.re (log x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (log x.re) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.im (log x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.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 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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 (+.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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)))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 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)))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 #s(literal -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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.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)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.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 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (*.f64 y.re (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))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (*.f64 y.re (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))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (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))) (*.f64 (sin.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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (pow (sqrt (+ (* x.im x.im) (* x.re x.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 #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 (pow (sqrt (+ (* x.im x.im) (* x.re x.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/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))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.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/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 (*.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/4 binary64) (*.f64 (pow.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 (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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.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 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.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 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (-.f64 (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.re (log x.re)) (*.f64 y.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 (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 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (+.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.im (log x.re)) (*.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))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (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 (+.f64 (*.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 (+.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.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 (+.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.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) (+.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.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) (+.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx x.im x.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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) (sin.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.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/720 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 y.im (log.f64 x.re)))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (*.f64 y.im (log.f64 x.re))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))) (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.re)) (+.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) 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)) (+.f64 (*.f64 y.im (log.f64 x.re)) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (*.f64 x.re x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (*.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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (*.f64 (*.f64 x.im x.im) (+.f64 (*.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 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (*.f64 (*.f64 x.im x.im) (+.f64 (*.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 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))) (pow.f64 x.re y.re)))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im)) x.im))
#s(approx (pow x.im y.re) (pow.f64 x.im y.re))
#s(approx (log x.im) (log.f64 x.im))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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 (cos.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (+.f64 (*.f64 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 (+.f64 (*.f64 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))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.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 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.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)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.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))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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 (neg.f64 (log.f64 x.im)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.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))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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 (neg.f64 (log.f64 x.im)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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 (neg.f64 (log.f64 x.im)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 (sin.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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (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 (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (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 (neg.f64 (log.f64 x.im)))))) (*.f64 x.im x.im))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (pow x.im y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))
#s(approx (log x.im) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #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))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.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 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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 (+.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.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)))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 #s(literal -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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.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)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.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 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (*.f64 y.re (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))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (*.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))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (*.f64 y.re (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))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (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))) (*.f64 (sin.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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (pow (sqrt (+ (* x.im x.im) (* x.re x.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 #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 (pow (sqrt (+ (* x.im x.im) (* x.re x.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/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))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.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/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 (*.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/4 binary64) (*.f64 (pow.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 (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))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) #s(literal 1 binary64)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (pow x.im y.re) (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 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (+.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (log.f64 #s(literal -1 binary64)) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#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 (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* 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 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.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 (*.f64 #s(literal -1 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/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.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 (*.f64 #s(literal -1 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/24 binary64) (*.f64 y.im (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal -3 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -360 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 180 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 x.re #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))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.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 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx y.re y.re)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.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))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (atan2.f64 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (+.f64 (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (+.f64 (*.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 (+.f64 (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/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 (+.f64 (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (*.f64 y.re y.re) (+.f64 (*.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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im)))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im))))))
#s(approx (pow x.im y.re) #s(literal 1 binary64))
#s(approx (pow x.im y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 x.im))))
#s(approx (pow x.im y.re) (+.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 (pow x.im y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 x.im) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im)))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.im (log.f64 x.im)))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (log.f64 x.im))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))))))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.re)))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.im (log.f64 x.re))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.re))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.im (log.f64 x.re)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.re))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.im (log.f64 x.re)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.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 (cos.f64 (*.f64 y.im (log.f64 x.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.im (log.f64 x.re))) (*.f64 y.re (+.f64 (*.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 (cos.f64 (*.f64 y.im (log.f64 x.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.im (log.f64 x.re))) (*.f64 y.re (+.f64 (*.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 (cos.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (cos.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.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))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.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 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.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.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.re) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (*.f64 y.re (+.f64 (/.f64 (log.f64 x.im) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (*.f64 y.re (log.f64 x.re)))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (*.f64 y.re (+.f64 (log.f64 x.re) (*.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) 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 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) y.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) y.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 x.im) y.re)) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.im))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (neg.f64 (log.f64 x.re)) (/.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 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) y.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx y.im y.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.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 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.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 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64))))))) (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)) (*.f64 y.im (+.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(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re)))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (pow.f64 x.im y.re)))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))))))
#s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (/.f64 (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) y.im))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (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))) (pow.f64 x.re y.re)))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re y.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 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 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 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 x.re y.re))))))) (pow.f64 x.re y.re)))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (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 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (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 (+.f64 (*.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 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (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 (+.f64 (*.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 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (+.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.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)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 x.re)) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.re) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.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)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (neg.f64 (log.f64 x.im)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (neg.f64 (log.f64 x.im)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (log.f64 x.re)) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (neg.f64 (log.f64 x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))

eval132.0ms (1.1%)

Memory
-9.5MiB live, 174.0MiB allocated; 33ms collecting garbage
Compiler

Compiled 86 676 to 5 165 computations (94% saved)

prune93.0ms (0.8%)

Memory
13.3MiB live, 201.1MiB allocated; 23ms collecting garbage
Pruning

41 alts after pruning (38 fresh and 3 done)

PrunedKeptTotal
New76623789
Fresh121527
Picked415
Done022
Total78241823
Accuracy
95.2%
Counts
823 → 41
Alt Table
Click to see full alt table
StatusAccuracyProgram
14.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))) (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im 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 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im 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 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))))
8.1%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (exp.f64 (*.f64 (log.f64 x.re) #s(literal 4 binary64))) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
24.0%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im)))))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
32.4%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re))))))
22.3%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im #s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
9.7%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
19.3%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
36.2%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re 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))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
37.6%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
34.7%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
33.2%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (sin (+ (* (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))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
11.1%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
13.2%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))))
10.5%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
8.0%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
11.2%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
13.1%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.re) (atan2.f64 x.im x.re))))))
10.9%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
11.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.im (log.f64 x.re))) (-.f64 (*.f64 (*.f64 y.re (atan2.f64 x.im 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)))))))))
27.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) #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 (*.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 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))))))))
34.6%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) #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 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)))))))
26.4%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re)) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
27.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (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))) (pow.f64 x.re y.re))))
21.2%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.re))))))
12.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (/.f64 (+.f64 (pow.f64 x.im #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)) #s(literal 3 binary64))) (+.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))) (*.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))))) y.re)))
39.4%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re)))) y.re)))
32.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))
26.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))) y.re)))
32.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) x.im)) y.re)))
12.8%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
43.3%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.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))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
37.0%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))) y.re)))
24.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (+.f64 (*.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)))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
21.4%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re)) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im))))))
28.2%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re)) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im #s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))))
19.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re)) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im #s(approx (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)) (*.f64 y.re (+.f64 (/.f64 (log.f64 x.im) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))))))))
7.8%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(approx (pow x.im y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 x.im))))) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))))
11.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
14.2%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (+.f64 (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
20.0%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
Compiler

Compiled 9 027 to 2 114 computations (76.6% saved)

regimes139.0ms (1.2%)

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

5 calls:

44.0ms
y.im
26.0ms
x.re
22.0ms
x.im
22.0ms
y.re
18.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
65.6%3(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
70.0%5x.re
63.4%3x.im
65.8%4y.re
63.0%5y.im
Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes22.0ms (0.2%)

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

1 calls:

17.0ms
x.re
Results
AccuracySegmentsBranch
69.8%5x.re
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes31.0ms (0.3%)

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

2 calls:

15.0ms
x.re
11.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
62.7%2(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
68.3%5x.re
Compiler

Compiled 38 to 23 computations (39.5% saved)

regimes49.0ms (0.4%)

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

2 calls:

34.0ms
x.re
11.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
62.0%2(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
65.8%4x.re
Compiler

Compiled 38 to 23 computations (39.5% saved)

regimes57.0ms (0.5%)

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

4 calls:

16.0ms
x.re
14.0ms
y.re
13.0ms
x.im
10.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
52.7%5x.im
54.6%2(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
63.4%4y.re
60.7%4x.re
Compiler

Compiled 40 to 31 computations (22.5% saved)

regimes12.0ms (0.1%)

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

1 calls:

9.0ms
y.re
Results
AccuracySegmentsBranch
60.6%3y.re
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes30.0ms (0.3%)

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

4 calls:

8.0ms
x.re
7.0ms
y.re
7.0ms
y.im
6.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
52.9%2(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
52.9%5x.re
51.2%3y.im
52.0%2y.re
Compiler

Compiled 40 to 31 computations (22.5% saved)

regimes14.0ms (0.1%)

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

2 calls:

7.0ms
y.re
5.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
51.8%2y.re
51.8%2(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Compiler

Compiled 38 to 23 computations (39.5% saved)

regimes73.0ms (0.6%)

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

5 calls:

3.0ms
y.im
3.0ms
y.re
3.0ms
x.re
3.0ms
x.im
2.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
43.3%1x.im
43.3%1x.re
43.3%1y.im
50.7%5(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
46.7%3y.re
Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes11.0ms (0.1%)

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

5 calls:

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

Compiled 41 to 35 computations (14.6% saved)

regimes4.0ms (0%)

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

2 calls:

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

Compiled 38 to 23 computations (39.5% saved)

regimes31.0ms (0.3%)

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

5 calls:

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

Compiled 41 to 35 computations (14.6% saved)

regimes6.0ms (0.1%)

Memory
17.0MiB live, 17.0MiB 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))) (sin (+ (* (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))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
Calls

5 calls:

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

Compiled 41 to 35 computations (14.6% saved)

bsearch181.0ms (1.6%)

Memory
10.1MiB live, 294.1MiB allocated; 20ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
37.0ms
9.149936964821453e+116
5.885131219733626e+123
39.0ms
5.28155177893911e-56
3.2130938561591083e-53
48.0ms
1.2088144473036992e-306
5.815652105552696e-300
42.0ms
-1.3012633979642279e-36
-7.219318013056073e-45
Samples
75.0ms211×1valid
56.0ms342×0valid
5.0ms2valid
Compiler

Compiled 4 348 to 2 457 computations (43.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 112.0ms
ival-mult: 29.0ms (25.8% of total)
ival-log: 20.0ms (17.8% of total)
ival-hypot: 16.0ms (14.2% of total)
ival-sin: 14.0ms (12.5% of total)
adjust: 12.0ms (10.7% of total)
ival-atan2: 8.0ms (7.1% of total)
ival-exp: 5.0ms (4.5% of total)
ival-sub: 3.0ms (2.7% of total)
ival-add: 3.0ms (2.7% of total)
ival-true: 1.0ms (0.9% of total)
ival-assert: 0.0ms (0% of total)

bsearch51.0ms (0.4%)

Memory
7.5MiB live, 101.7MiB allocated; 24ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
9.149936964821453e+116
5.885131219733626e+123
1.0ms
5.28155177893911e-56
3.2130938561591083e-53
1.0ms
1.2088144473036992e-306
5.815652105552696e-300
44.0ms
-3.851571730279463e+110
-2.3973890486348306e+109
Samples
16.0ms44×1valid
11.0ms65×0valid
2.0ms2valid
Compiler

Compiled 4 186 to 2 312 computations (44.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 25.0ms
ival-mult: 5.0ms (19.9% of total)
ival-hypot: 4.0ms (15.9% of total)
ival-add: 4.0ms (15.9% of total)
ival-sin: 4.0ms (15.9% of total)
adjust: 3.0ms (11.9% of total)
ival-log: 3.0ms (11.9% of total)
ival-atan2: 2.0ms (7.9% of total)
ival-exp: 1.0ms (4% of total)
ival-sub: 1.0ms (4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch52.0ms (0.4%)

Memory
5.6MiB live, 99.0MiB allocated; 11ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
40.0ms
6.617846131724844e+99
1.618570577120808e+110
5.0ms
5.28155177893911e-56
3.2130938561591083e-53
2.0ms
1.2088144473036992e-306
5.815652105552696e-300
1.0ms
-3.851571730279463e+110
-2.3973890486348306e+109
Samples
20.0ms55×1valid
13.0ms105×0valid
Compiler

Compiled 4 564 to 2 544 computations (44.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 27.0ms
ival-mult: 6.0ms (22.3% of total)
adjust: 4.0ms (14.9% of total)
ival-hypot: 4.0ms (14.9% of total)
ival-log: 3.0ms (11.2% of total)
ival-sin: 3.0ms (11.2% of total)
ival-exp: 2.0ms (7.4% of total)
ival-atan2: 2.0ms (7.4% of total)
ival-sub: 1.0ms (3.7% of total)
ival-add: 1.0ms (3.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch58.0ms (0.5%)

Memory
13.6MiB live, 132.4MiB allocated; 19ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
2.0ms
6.617846131724844e+99
1.618570577120808e+110
50.0ms
1.9584475527786676e-126
6.248332899132951e-121
1.0ms
-3.851571730279463e+110
-2.3973890486348306e+109
Samples
25.0ms55×1valid
19.0ms89×0valid
Compiler

Compiled 3 910 to 2 108 computations (46.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 30.0ms
adjust: 8.0ms (26.9% of total)
ival-mult: 6.0ms (20.2% of total)
ival-hypot: 4.0ms (13.5% of total)
ival-log: 3.0ms (10.1% of total)
ival-sin: 3.0ms (10.1% of total)
ival-exp: 2.0ms (6.7% of total)
ival-atan2: 2.0ms (6.7% of total)
ival-add: 1.0ms (3.4% of total)
ival-sub: 1.0ms (3.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch1.3s (10.9%)

Memory
-116.0MiB live, 285.2MiB allocated; 1.5s collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
971.0ms
4.2632370792036055e-13
1.0968522317919098e-8
211.0ms
-3.167150753251437e-222
-4.839410811727955e-223
55.0ms
-1.3833645427996603e+20
-30487872378.75768
Samples
1.2s95×1valid
38.0ms289×0valid
Compiler

Compiled 3 316 to 1 675 computations (49.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 71.0ms
ival-sin: 21.0ms (29.6% of total)
ival-mult: 15.0ms (21.2% of total)
ival-hypot: 10.0ms (14.1% of total)
ival-log: 8.0ms (11.3% of total)
adjust: 5.0ms (7.1% of total)
ival-exp: 4.0ms (5.6% of total)
ival-atan2: 4.0ms (5.6% of total)
ival-add: 2.0ms (2.8% of total)
ival-sub: 2.0ms (2.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch88.0ms (0.8%)

Memory
-2.1MiB live, 44.4MiB allocated; 23ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
34.0ms
0.46212300142924767
382367988.6778186
30.0ms
-6.141788464925122e-40
-5.10439558711822e-46
Samples
29.0ms227×0valid
21.0ms61×1valid
Compiler

Compiled 2 803 to 1 400 computations (50.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 40.0ms
ival-mult: 10.0ms (24.7% of total)
ival-hypot: 7.0ms (17.3% of total)
ival-sin: 6.0ms (14.8% of total)
ival-log: 5.0ms (12.4% of total)
adjust: 3.0ms (7.4% of total)
ival-exp: 3.0ms (7.4% of total)
ival-atan2: 3.0ms (7.4% of total)
ival-add: 1.0ms (2.5% of total)
ival-sub: 1.0ms (2.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
1.0MiB live, 1.0MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
9.227478846749734e-21
4.576066975818885e-5
Compiler

Compiled 40 to 26 computations (35% saved)

bsearch32.0ms (0.3%)

Memory
39.7MiB live, 39.7MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
29.0ms
-3.81255778368114e-272
-1.3140968925015565e-275
Samples
12.0ms98×0valid
11.0ms30×1valid
Compiler

Compiled 1 216 to 591 computations (51.4% saved)

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

bsearch1.0ms (0%)

Memory
1.5MiB live, 1.5MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
9.227478846749734e-21
4.576066975818885e-5
0.0ms
0.0
1.3056314610921497e-265
0.0ms
-8.303636340205897e-289
-0.0
0.0ms
-1.2347645231273853e-18
-1.9181617354323835e-20
Compiler

Compiled 40 to 26 computations (35% saved)

bsearch3.0ms (0%)

Memory
-48.0MiB live, 1.3MiB allocated; 4ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.9853013834632754
+inf
0.0ms
0.0
1.3056314610921497e-265
0.0ms
-8.303636340205897e-289
-0.0
0.0ms
-1.2347645231273853e-18
-1.9181617354323835e-20
Compiler

Compiled 40 to 26 computations (35% saved)

simplify73.0ms (0.6%)

Memory
35.2MiB live, 81.1MiB allocated; 4ms collecting garbage
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
01993132
13162987
27292865
326312865
461842865
Stop Event
node limit
Calls
Call 1
Inputs
(if (<=.f64 x.re #s(literal -5884782876925013/49039857307708443467467104868809893875799651909875269632 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 x.re #s(literal 7716585907341217/6325070415853456823515479584966165845298645305129441198653167438357198111499854590373761990669910140474596183259900372230931523043306046152094168748148078435047419508642698792639590866940413010663742739952273283392562733857021646831815729864036236135650314266011211548510419206725953204130822734645187695728365866909171712 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (if (<=.f64 x.re #s(literal 4831222442753395/27606985387162255149739023449108101809804435888681546220650096895197184 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 x.re #s(literal 4900000000000000093739144832651626213894204661854171946337231291256785019113467797278052404178739879401516192436846592 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))
(if (<=.f64 x.re #s(literal -210000000000000014962006408855019736209066134631720728457459081793149009504651500512299930531166975387720744960 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 x.re #s(literal 7716585907341217/6325070415853456823515479584966165845298645305129441198653167438357198111499854590373761990669910140474596183259900372230931523043306046152094168748148078435047419508642698792639590866940413010663742739952273283392562733857021646831815729864036236135650314266011211548510419206725953204130822734645187695728365866909171712 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (if (<=.f64 x.re #s(literal 4831222442753395/27606985387162255149739023449108101809804435888681546220650096895197184 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 x.re #s(literal 4900000000000000093739144832651626213894204661854171946337231291256785019113467797278052404178739879401516192436846592 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))
(if (<=.f64 x.re #s(literal -210000000000000014962006408855019736209066134631720728457459081793149009504651500512299930531166975387720744960 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 x.re #s(literal 7716585907341217/6325070415853456823515479584966165845298645305129441198653167438357198111499854590373761990669910140474596183259900372230931523043306046152094168748148078435047419508642698792639590866940413010663742739952273283392562733857021646831815729864036236135650314266011211548510419206725953204130822734645187695728365866909171712 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (if (<=.f64 x.re #s(literal 4831222442753395/27606985387162255149739023449108101809804435888681546220650096895197184 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 x.re #s(literal 110000000000000000210724259430813560983755063999171121226808386605931725662438763155735975961899835588608 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re)) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))
(if (<=.f64 x.re #s(literal -210000000000000014962006408855019736209066134631720728457459081793149009504651500512299930531166975387720744960 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 x.re #s(literal 2191168721230097/95268205270873786358080970147496530326800480428008152797215483387004752771599292606210513399154418065180265231976520474104247304665780191232 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (if (<=.f64 x.re #s(literal 110000000000000000210724259430813560983755063999171121226808386605931725662438763155735975961899835588608 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re)) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
(if (<=.f64 y.re #s(literal -31000000000 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (if (<=.f64 y.re #s(literal -691871614739731/406983302788077043095694079023514269845261128071039316430435657456301100941017582490321789603976702315852655675868728054558642679084433903830771243428395388555612645234009677640568743036609742720273743660637609984234054445646756670603264 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 y.re #s(literal 7253554917687775/2417851639229258349412352 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (sin (+ (* (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))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))))
(if (<=.f64 y.re #s(literal -8235557476827325/200867255532373784442745261542645325315275374222849104412672 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (if (<=.f64 y.re #s(literal 50 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (sin (+ (* (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))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))
(if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 6646139978924579/664613997892457936451903530140172288 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))
(if (<=.f64 y.re #s(literal -18272463771375/76135265714062492815260799905274908678720522324960996303655519196976161646612703925512617702203205150197694658057880220183274764571899172238890525752442604840088107030909945545865544183516044127756246824056393584950668733792147460513643465745851293850216709399252168336576785859311828992 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal -1298074214633707/1298074214633706907132624082305024 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal -5486124068793689/10972248137587377366511872502374418540148785271864664140224003976912394763519345894330351399072725587226569450675744223489916367725489295806448207436491340599228997401420012529071180395583868049283025082524719590383187907857816337980585517000782912424520905193151019179684280147612287372121298604103041024 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 0 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 6646139978924579/664613997892457936451903530140172288 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))))))
(if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal -1298074214633707/1298074214633706907132624082305024 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re))) (if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal -5486124068793689/10972248137587377366511872502374418540148785271864664140224003976912394763519345894330351399072725587226569450675744223489916367725489295806448207436491340599228997401420012529071180395583868049283025082524719590383187907857816337980585517000782912424520905193151019179684280147612287372121298604103041024 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 0 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re))) (if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 1 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
Outputs
(if (<=.f64 x.re #s(literal -5884782876925013/49039857307708443467467104868809893875799651909875269632 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 x.re #s(literal 7716585907341217/6325070415853456823515479584966165845298645305129441198653167438357198111499854590373761990669910140474596183259900372230931523043306046152094168748148078435047419508642698792639590866940413010663742739952273283392562733857021646831815729864036236135650314266011211548510419206725953204130822734645187695728365866909171712 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (if (<=.f64 x.re #s(literal 4831222442753395/27606985387162255149739023449108101809804435888681546220650096895197184 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 x.re #s(literal 4900000000000000093739144832651626213894204661854171946337231291256785019113467797278052404178739879401516192436846592 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))
(if (<=.f64 x.re #s(literal -5884782876925013/49039857307708443467467104868809893875799651909875269632 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (neg.f64 x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 x.re #s(literal 7716585907341217/6325070415853456823515479584966165845298645305129441198653167438357198111499854590373761990669910140474596183259900372230931523043306046152094168748148078435047419508642698792639590866940413010663742739952273283392562733857021646831815729864036236135650314266011211548510419206725953204130822734645187695728365866909171712 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (if (<=.f64 x.re #s(literal 4831222442753395/27606985387162255149739023449108101809804435888681546220650096895197184 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 x.re #s(literal 4900000000000000093739144832651626213894204661854171946337231291256785019113467797278052404178739879401516192436846592 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))
(if (<=.f64 x.re #s(literal -210000000000000014962006408855019736209066134631720728457459081793149009504651500512299930531166975387720744960 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 x.re #s(literal 7716585907341217/6325070415853456823515479584966165845298645305129441198653167438357198111499854590373761990669910140474596183259900372230931523043306046152094168748148078435047419508642698792639590866940413010663742739952273283392562733857021646831815729864036236135650314266011211548510419206725953204130822734645187695728365866909171712 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (if (<=.f64 x.re #s(literal 4831222442753395/27606985387162255149739023449108101809804435888681546220650096895197184 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 x.re #s(literal 4900000000000000093739144832651626213894204661854171946337231291256785019113467797278052404178739879401516192436846592 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))
(if (<=.f64 x.re #s(literal -210000000000000014962006408855019736209066134631720728457459081793149009504651500512299930531166975387720744960 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 x.re #s(literal 7716585907341217/6325070415853456823515479584966165845298645305129441198653167438357198111499854590373761990669910140474596183259900372230931523043306046152094168748148078435047419508642698792639590866940413010663742739952273283392562733857021646831815729864036236135650314266011211548510419206725953204130822734645187695728365866909171712 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (if (<=.f64 x.re #s(literal 4831222442753395/27606985387162255149739023449108101809804435888681546220650096895197184 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 x.re #s(literal 4900000000000000093739144832651626213894204661854171946337231291256785019113467797278052404178739879401516192436846592 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))
(if (<=.f64 x.re #s(literal -210000000000000014962006408855019736209066134631720728457459081793149009504651500512299930531166975387720744960 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 x.re #s(literal 7716585907341217/6325070415853456823515479584966165845298645305129441198653167438357198111499854590373761990669910140474596183259900372230931523043306046152094168748148078435047419508642698792639590866940413010663742739952273283392562733857021646831815729864036236135650314266011211548510419206725953204130822734645187695728365866909171712 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (if (<=.f64 x.re #s(literal 4831222442753395/27606985387162255149739023449108101809804435888681546220650096895197184 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 x.re #s(literal 110000000000000000210724259430813560983755063999171121226808386605931725662438763155735975961899835588608 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re)) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))
(if (<=.f64 x.re #s(literal -210000000000000014962006408855019736209066134631720728457459081793149009504651500512299930531166975387720744960 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 x.re #s(literal 7716585907341217/6325070415853456823515479584966165845298645305129441198653167438357198111499854590373761990669910140474596183259900372230931523043306046152094168748148078435047419508642698792639590866940413010663742739952273283392562733857021646831815729864036236135650314266011211548510419206725953204130822734645187695728365866909171712 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (if (<=.f64 x.re #s(literal 4831222442753395/27606985387162255149739023449108101809804435888681546220650096895197184 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 x.re #s(literal 110000000000000000210724259430813560983755063999171121226808386605931725662438763155735975961899835588608 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re)) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))
(if (<=.f64 x.re #s(literal -210000000000000014962006408855019736209066134631720728457459081793149009504651500512299930531166975387720744960 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 x.re #s(literal 2191168721230097/95268205270873786358080970147496530326800480428008152797215483387004752771599292606210513399154418065180265231976520474104247304665780191232 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (if (<=.f64 x.re #s(literal 110000000000000000210724259430813560983755063999171121226808386605931725662438763155735975961899835588608 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re)) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
(if (<=.f64 x.re #s(literal -210000000000000014962006408855019736209066134631720728457459081793149009504651500512299930531166975387720744960 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 x.re #s(literal 2191168721230097/95268205270873786358080970147496530326800480428008152797215483387004752771599292606210513399154418065180265231976520474104247304665780191232 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (if (<=.f64 x.re #s(literal 110000000000000000210724259430813560983755063999171121226808386605931725662438763155735975961899835588608 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (/ (+ (pow (* x.re x.re) 3) (pow (* x.im x.im) 3)) (+ (pow x.re 4) (- (pow x.im 4) (* (* x.re x.re) (* x.im x.im))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re)) (sin.f64 (+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
(if (<=.f64 y.re #s(literal -31000000000 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (if (<=.f64 y.re #s(literal -691871614739731/406983302788077043095694079023514269845261128071039316430435657456301100941017582490321789603976702315852655675868728054558642679084433903830771243428395388555612645234009677640568743036609742720273743660637609984234054445646756670603264 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 y.re #s(literal 7253554917687775/2417851639229258349412352 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (sin (+ (* (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))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))))
(if (<=.f64 y.re #s(literal -31000000000 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (if (<=.f64 y.re #s(literal -691871614739731/406983302788077043095694079023514269845261128071039316430435657456301100941017582490321789603976702315852655675868728054558642679084433903830771243428395388555612645234009677640568743036609742720273743660637609984234054445646756670603264 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 y.re #s(literal 7253554917687775/2417851639229258349412352 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (*.f64 (neg.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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))))
(if (<=.f64 y.re #s(literal -8235557476827325/200867255532373784442745261542645325315275374222849104412672 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (if (<=.f64 y.re #s(literal 50 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (sin (+ (* (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))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))
(if (<=.f64 y.re #s(literal -8235557476827325/200867255532373784442745261542645325315275374222849104412672 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (if (<=.f64 y.re #s(literal 50 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (*.f64 (neg.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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))
(if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 6646139978924579/664613997892457936451903530140172288 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))
(if (<=.f64 y.re #s(literal -18272463771375/76135265714062492815260799905274908678720522324960996303655519196976161646612703925512617702203205150197694658057880220183274764571899172238890525752442604840088107030909945545865544183516044127756246824056393584950668733792147460513643465745851293850216709399252168336576785859311828992 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) (cos (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal -1298074214633707/1298074214633706907132624082305024 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal -5486124068793689/10972248137587377366511872502374418540148785271864664140224003976912394763519345894330351399072725587226569450675744223489916367725489295806448207436491340599228997401420012529071180395583868049283025082524719590383187907857816337980585517000782912424520905193151019179684280147612287372121298604103041024 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 0 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 6646139978924579/664613997892457936451903530140172288 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)))))))
(if (or (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal -1298074214633707/1298074214633706907132624082305024 binary64)) (not (or (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal -5486124068793689/10972248137587377366511872502374418540148785271864664140224003976912394763519345894330351399072725587226569450675744223489916367725489295806448207436491340599228997401420012529071180395583868049283025082524719590383187907857816337980585517000782912424520905193151019179684280147612287372121298604103041024 binary64)) (not (or (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 0 binary64)) (not (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 6646139978924579/664613997892457936451903530140172288 binary64)))))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal -1298074214633707/1298074214633706907132624082305024 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re))) (if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal -5486124068793689/10972248137587377366511872502374418540148785271864664140224003976912394763519345894330351399072725587226569450675744223489916367725489295806448207436491340599228997401420012529071180395583868049283025082524719590383187907857816337980585517000782912424520905193151019179684280147612287372121298604103041024 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 0 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re))) (if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 1 binary64)) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))))))
(if (or (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal -1298074214633707/1298074214633706907132624082305024 binary64)) (not (or (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal -5486124068793689/10972248137587377366511872502374418540148785271864664140224003976912394763519345894330351399072725587226569450675744223489916367725489295806448207436491340599228997401420012529071180395583868049283025082524719590383187907857816337980585517000782912424520905193151019179684280147612287372121298604103041024 binary64)) (not (or (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 0 binary64)) (not (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 1 binary64)))))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re))) (*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))

derivations482.0ms (4.1%)

Memory
7.6MiB live, 283.9MiB allocated; 181ms collecting garbage
Stop Event
fuel
Compiler

Compiled 2 892 to 205 computations (92.9% saved)

preprocess74.0ms (0.6%)

Memory
20.3MiB live, 112.7MiB allocated; 10ms collecting garbage
Compiler

Compiled 5 858 to 448 computations (92.4% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...